--[[
    编码: WMS-04-51
    名称: 货位-删除库区货位
    作者：HAN  
    日期：2025-1-29

    级别：固定 (说明本段代码在项目中不太会变化)
    
    函数： DeleteAreaLocation

    功能:
        -- 删除指定库区的货位
    
    更改记录:
  
--]]
wms_wh = require( "wms_wh" )

function DeleteAreaLocation ( strLuaDEID ) 
    local nRet, strRetInfo

    -- 获取输入界面中的属性
    nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_AREA_CODE"  )  
    if ( nRet ~= 0 )  then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end 
    local obj_attrs = json.decode( strRetInfo ) 
    local area_code = obj_attrs[1].value                        -- 库区编码        

    -- 删除库区中的所有货位定义
    local strCondition = "S_AREA_CODE = '"..area_code.."'"
    nRet, strRetInfo = mobox.dbdeleteData( strLuaDEID, "Location", strCondition )
    if ( nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【货位】信息失败!  "..strRetInfo ) end  
    nRet, strRetInfo = mobox.dbdeleteData( strLuaDEID, "Location_Group", strCondition )
    if ( nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【货位组】信息失败!  "..strRetInfo ) end  
    nRet, strRetInfo = mobox.dbdeleteData( strLuaDEID, "Aisle", strCondition )
    if ( nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【巷道】信息失败!  "..strRetInfo ) end          
end